[VB] 关于限制TEXT输入内容的问题

来源：百度知道 编辑：UC知道 时间：2024/09/25 15:24:06
我想单纯限制TEXT2里只能输入数字，我用了这个判断语句
If Not IsNumeric(Text2.Text) Then
可是我发现当我输入0+ 4- 7.这些也可以!但单独输入+ . - 就不可以
怎么解决这个问题??

注:我想得到的是只能输入数字,也就是只有0123456789可以被输入进去,输入其他的只要不是数字的TEXT就会被清空

感谢!

Private Sub Form_Load()
Text1 = ""
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < Asc("0") Or KeyAscii > Asc("9") Then KeyAscii = 0
End Sub

在 VBA 中
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If Not (KeyAscii >= 48 And KeyAscii <= 57) Then KeyAscii = 0
End Sub

这是那种编程语言,怎么不说清楚点...